function PlotTrack(aircraft,weather,target,settings,fig);
%*=+--+=#=+--      UAS Severe Weather Simulation Softeware        --+=#=+--+=#*%
%          Copyright (C) 2013 Regents of the University of Colorado.           %
%                             All Rights Reserved.                             %
%                                                                              %
%    This program is free software: you can redistribute it and/or modify      %
%    it under the terms of the GNU General Public License version 2 as         %
%    published by the Free Software Foundation.                                %
%                                                                              %
%    This program is distributed in the hope that it will be useful,           %
%    but WITHOUT ANY WARRANTY; without even the implied warranty of            %
%    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the             %
%    GNU General Public License for more details.                              %
%                                                                              %
%    You should have received a copy of the GNU General Public License         %
%    along with this program.  If not, see <http://www.gnu.org/licenses/>.     %
%                                                                              %
%           Jack Elston                                                        %
%           elstonj@colorado.edu                                               %
%                                                                              %
%*=+--+=#=+--                 --+=#=+--+=#=+--                    --+=#=+--+=#*%

colors = [   1   0   0;
             1 0.5   0;
             1   1   0;
           0.5   1   0;
             0   1   0;
             0   1 0.5;
             0   1   1;
             0   0.5 1;
             0   0   1 ];

figure(fig); clf;

for time = 1:4

  hold off;
  subplot(1,4,time);
  plot(weather,(settings.sim.tf-settings.sim.t0)/4*time + settings.sim.t0,500,'rain wind il',fig)
  title('');
  colormap([1:-0.01:0; 1:-0.01:0; 1:-0.01:0]')
  hold on 
  %plot(aircraft,fig,'track')          
  axis([2.0*10^4 3.2*10^4 1.4*10^4 2.6*10^4])
  hold off

  %figure(fig+1); clf;
  hold on;
  ua_log = aircraft.log;

  maximum = max(ua_log.sonde(:,4));
  minimum = min(ua_log.sonde(:,4));
  bins = size(colors,1)-1;
  step = (maximum - minimum)/bins;

  for i = 2:10:size(ua_log.sonde,1)/4*time
    n = floor((ua_log.sonde(i,4)-minimum)/step)+1;
    plot(ua_log.sonde(i,1),ua_log.sonde(i,2),'o','MarkerEdgeColor',[0 0 0],'MarkerFaceColor',colors(n,:),'MarkerSize',8);
  end
  hold off;

  %h = legend('rain contours','wind vector','sensor measurement');
  %set(h, 'Color',[1 1 1]);
  %set(h, 'FontSize',14);

end
